home *** CD-ROM | disk | FTP | other *** search
- <?xml version="1.0" encoding="utf-8" ?>
- <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
- <background>
- <id>2799</id>
- <filler1>0</filler1>
- <bitmap>BMAP_3400.pbm</bitmap>
- <cantDelete> <true /> </cantDelete>
- <showPict> <true /> </showPict>
- <dontSearch> <false /> </dontSearch>
- <link rel="stylesheet" type="text/css" href="stylesheet_4295.css" />
- <part>
- <id>1</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>483</left>
- <top>315</top>
- <right>507</right>
- <bottom>337</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>1012</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name>Return</name>
- <script>on mouseUp
- visual effect iris close
- go back
- end mouseUp
- </script>
- </part>
- <part>
- <id>3</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>483</left>
- <top>232</top>
- <right>509</right>
- <bottom>258</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name></name>
- <script>on mouseUp
- put cd fld mapname into temp
- visual iris close
- go to card "World Map"
- repeat 10
- set the hilite of cd btn temp to true
- set the hilite of cd btn temp to false
- end repeat
- end mouseUp
- </script>
- </part>
- <part>
- <id>4</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>482</left>
- <top>144</top>
- <right>509</right>
- <bottom>170</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name></name>
- <script>on mouseUp
- global selectedCountry
- if selectedCountry = "" then
- answer "Please select a country first."
- exit mouseUp
- end if
- go to card selectedCountry
- if the result is not empty then
- put "Sorry. No fact card for " & quote &¬
- selectedCountry & quote & "." into askMsg
- answer askMsg
- exit mouseUp
- end if
- end mouseUp
- </script>
- </part>
- <part>
- <id>5</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>482</left>
- <top>187</top>
- <right>509</right>
- <bottom>213</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name></name>
- <script>on mouseUp
- set cursor to watch
- global selectedCountry
- if selectedCountry = "" then
- answer "Please select a country first."
- exit mouseUp
- end if
- put selectedCountry into temp
- go to card selectedCountry of stack "Radio"
- if the result is not empty then
- put "Sorry. No list cards for " & quote &¬
- temp & quote & "." into askMsg
- answer askMsg
- exit mouseUp
- end if
- set cursor to browse
- end mouseUp
- </script>
- </part>
- <part>
- <id>6</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>483</left>
- <top>36</top>
- <right>509</right>
- <bottom>63</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <true /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name></name>
- <script>on mouseUp
- visual effect iris close
- go to card "radio home" of stack "Radio"
- end mouseUp
- </script>
- </part>
- <part>
- <id>7</id>
- <type>button</type>
- <visible> <true /> </visible>
- <reserved5> 0 </reserved5>
- <reserved4> 0 </reserved4>
- <reserved3> 0 </reserved3>
- <reserved2> 0 </reserved2>
- <reserved1> 0 </reserved1>
- <enabled> <true /> </enabled>
- <rect>
- <left>479</left>
- <top>99</top>
- <right>512</right>
- <bottom>128</bottom>
- </rect>
- <style>transparent</style>
- <showName> <false /> </showName>
- <highlight> <false /> </highlight>
- <autoHighlight> <false /> </autoHighlight>
- <sharedHighlight> <true /> </sharedHighlight>
- <family>0</family>
- <titleWidth>0</titleWidth>
- <icon>0</icon>
- <textAlign>center</textAlign>
- <font>Chicago</font>
- <textSize>12</textSize>
- <textStyle>plain</textStyle>
- <name></name>
- <script>on mouseUp
- doMenu Find...
- end mouseUp
-
- </script>
- </part>
- <name></name>
- <script>on clickOn buttonName
- global selectedCountry
- lock screen
- if selectedCountry <> "" then
- set hilite of cd btn selectedCountry to false
- end if
- put buttonName into selectedCountry
- set hilite of cd btn selectedCountry to true
- unlock screen
- end clickOn
-
- on openCard
- put the short name of this card into cd fld MapName
- end openCard
-
- on closeCard
- global selectedCountry
- if selectedCountry <> "" then
- set hilite of cd btn selectedCountry to false
- end if
- put "" into selectedCountry
- end closeCard</script>
- </background>
-